home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 3 / Cream of the Crop 3.iso / clipper / ks94an.zip / TERMNATE.HDR < prev    next >
Text File  |  1994-04-25  |  934b  |  38 lines
  1. /******************************************************************************
  2.                  The Klipper Library, for CA-Clipper 5.x
  3.         Copyright (c), 1994, Wallace Information Systems Engineering
  4.  
  5. FUNCTION:
  6.  
  7. _Terminate( cTermMsg, nErrorLevel ) --> NIL
  8.  
  9. PARAMETERS:
  10.  
  11. cTermMsg    : message to display at termination
  12. nErrorLevel : Errorlevel to set before returning to OS
  13.  
  14. SHORT:
  15.  
  16. General purpose application death-invoker with ERRORLEVEL set.
  17.  
  18. DESCRIPTION:
  19.  
  20. _Terminate() ends program operation.  It clears the screen, displays the
  21. cTermMsg message, closes all files and QUITs with ERRORLEVEL set to
  22. specified value.
  23.  
  24. NOTE:
  25.  
  26.  
  27.  
  28. EXAMPLE:
  29.  
  30. if UNRECOVERABLE_ERROR
  31.     _Terminate('An unrecoverable error has occured',1)
  32. endif
  33.  
  34. Result:  The message is dislayed and the program is terminated with
  35. an ERRORLEVEL = 1.
  36.  
  37. ******************************************************************************/
  38.